www.gusucode.com > 茶都拼客网全功能版 8 > 茶都拼客网全功能版 8.8源码程序/teasdxmccom/茶都拼客网V8.8（全功能，无限制，完全开源）/Ku_type/Sj_kind.asp

    <div align="center">
<table cellpadding="0" cellspacing="0" width="100">
	<tr>
		<td height="5"></td>
	</tr>
</table>
</div>
<div align="center">
	<table cellpadding="0" cellspacing="0" width="232" height="203">
		<tr>
			<td height="32" background="Ku_img/down_001.jpg">
			<div align="center">
			<table cellpadding="0" cellspacing="0" width="232">

				<tr>
					<td height="10" width="110">
					<p align="center"><div id="dazi">
							<p align="center"><font color="#0066FF">
							<b>商家分类</b></font></div></td>
					<td height="10">&nbsp;</td>
					<td height="10" width="60"><a href="Gu_Shangjia.asp">全部商家</a></td>
				</tr>
			</table>
			</div>
			</td>
		</tr>
		<tr>
			<td height="165" background="Ku_img/down_002.jpg" valign="top">
			<div align=center>
			<table border="0" width="95%"  cellpadding="1" cellspacing="3" >

	<%
	set rskind=server.CreateObject("adodb.recordset")
sqlkind="select * from shangjia_kind order by ID asc"
rskind.open sqlkind,conn,1,1
if rskind.eof then
%>
<tr style="border: 1px solid #D0D4D9"><td>没有分类</td></tr>
<% else 

  dim k
  k=1
%>
<tr align="center" >
<% do while not rskind.eof%>
<td width="50%" style="border: 1px solid #D0D4D9" height="30"><a href="Gu_Shangjia.asp?guxing=<%=rskind("id")%>"><%=left(rskind("Name"),6)%></a> 
</td>
<% if k mod 2 =0 then%> 
</tr><tr align="center">
<% end if%><% k=k+1
   rskind.movenext
   loop
end if
rskind.close
set rskind=nothing
%>

	</tr>
</table>
</div>
			</td>
		</tr>
		<tr>
			<td height="6">
			<img border="0" src="Ku_img/down_003.jpg" width="232" height="6"></td>
		</tr>
<!--【拼客商家】列表页面-右边【商家分类】下方广告位-->
	<tr>
		<td height="5"></td>
	</tr>
		<tr>
			<td><% Call Ku_AD(27) %></td>
		</tr>
<!--【拼客商家】列表页面-右边【商家分类】下方广告位-->
	</table>
</div>